From fbaf093af1f44d51a24bc8fd9e2a5acf5bda4afc Mon Sep 17 00:00:00 2001
From: Ken Raeburn <raeburn@raeburn.org>
Date: Mon, 15 Jul 2002 02:16:52 +0000
Subject: [PATCH] * lread.c (read_vector): Use STRING_SET_CHARS.

---
 src/lread.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/lread.c b/src/lread.c
index 6900e337c7c..3b06968e084 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -2760,7 +2760,7 @@ read_vector (readcharfun, bytecodeflag)
 		  /* Coerce string to unibyte (like string-as-unibyte,
 		     but without generating extra garbage and
 		     guaranteeing no change in the contents).  */
-		  SCHARS (bytestr) = SBYTES (bytestr);
+		  STRING_SET_CHARS (bytestr, SBYTES (bytestr));
 		  STRING_SET_UNIBYTE (bytestr);
 
 		  item = Fread (bytestr);
-- 
2.30.2